package com.lagou.edu.factory.parsing;

import com.lagou.edu.factory.ProxyFactory;
import com.lagou.edu.factory.annotaion.*;
import com.lagou.edu.factory.exception.BeanNameConflictException;
import com.lagou.edu.factory.exception.BeanNotFoundException;

import java.io.File;
import java.io.FileFilter;
import java.io.IOException;
import java.lang.reflect.Field;
import java.lang.reflect.Method;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.*;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

public class AnnotationBeanBuilder implements BeanBuilder {

    private Set<Class<?>> classSet = new LinkedHashSet<Class<?>>();
    private Map<String,Autowired> autowiredMap = new HashMap<>();
    private Map<String, Object> transactionalMap = new HashMap<>();


    public BeanPool parse(BeanPool beanPool) throws Exception{
        if (beanPool.getBeansMap() == null){
            beanPool.setBeansMap(new HashMap());
        }
        //获取basePackage下的所有类
        Set<Class<?>> classSet = getClasses(beanPool.getBasePackage());
        for (Class clazz: classSet) {
            Service service = (Service) clazz.getDeclaredAnnotation(Service.class);
            Repository repository = (Repository) clazz.getAnnotation(Repository.class);
            Component component = (Component) clazz.getAnnotation(Component.class);
            if (service == null && repository == null && component == null){
                continue;
            }
            String value = "";
            if (service != null){
                value = service.value();
            }else if (repository != null){
                value = repository.value();
            }else if (component != null){
                value = component.value();
            }
            //如果定义了value值，则以value值为key值，否则用类的全限定类型作为key值
            String key;
            if (value.isEmpty()){
                key = clazz.getCanonicalName();
            }else {
                key = value;
            }

            //判断beansMap是否已经存在该key，如果存在，判断类型是否一致；
            Object objInMap = beanPool.getBeansMap().get(key);
            if (objInMap != null){
                if (!objInMap.getClass().getCanonicalName().equals(clazz.getCanonicalName())){
                    throw new BeanNameConflictException();
                }
            }else {
                Object o = clazz.newInstance();
                beanPool.getBeansMap().put(key,o);
                beanPool.getBeansMapWithClassName().put(clazz.getName(),o);

                //解析@Autowired注解的属性
                Field[] fields = clazz.getDeclaredFields();
                for (Field field : fields){
                    Autowired autowired = field.getAnnotation(Autowired.class);
                    if (autowired != null){
                        autowiredMap.put(generateFieldKey(key,field),autowired);
                    }
                }

                //解析@Transational注解的事务方法
                Method[] methods = clazz.getMethods();
                for (Method method : methods){
                    Transactional[] annotations = method.getAnnotationsByType(Transactional.class);
                    if (annotations != null && annotations.length > 0){
                        transactionalMap.put(key,o);
                        break;
                    }
                }
            }

        }
        return beanPool;
    }

    private String generateFieldKey(String key,Field field){
        return key + "-" + field.getName();
    }

    private String generateMethodKey(String key,Method method){
        return key + "-" + method.getName();
    }
    private String getParentKey(String key){
        int index = key.lastIndexOf("-");
        return key.substring(0,index);
    }


    private String getFieldName(String key){
        int index = key.lastIndexOf("-");
        return key.substring(index + 1);
    }

    @Override
    public BeanPool assemble(BeanPool beanPool) throws Exception {
        //遍历fieldMap进行属性自动装配
        for (String autowiredKey : autowiredMap.keySet()){
            //获取父类在beansMap中的key值
            String parentKey = getParentKey(autowiredKey);
            String fieldName = getFieldName(autowiredKey);
            //拿到父类
            Object parent = beanPool.getBeansMap().get(parentKey);
            if (parent != null){
                //拿到类的属性
                Field field = parent.getClass().getDeclaredField(fieldName);
                String typeName = field.getGenericType().getTypeName();
                Object fieldInMap = getFieldValueInMap(beanPool,typeName);
                Autowired autowired = autowiredMap.get(autowiredKey);
                if (autowired.required() && fieldInMap == null){
                    throw new BeanNotFoundException(typeName);
                }
                //对类进行设置操作
                Method[] methods = parent.getClass().getDeclaredMethods();
                for (Method method : methods){
                    if (method.getName().equalsIgnoreCase("set" + fieldName)){
                        method.invoke(parent,fieldInMap);
                    }
                }
            }
        }

        ProxyFactory proxyFactory = (ProxyFactory) beanPool.getBeansMapWithClassName().get(ProxyFactory.class.getCanonicalName());

        //将事务方法进行增强
        for (String key : transactionalMap.keySet()){
            Object originObj = transactionalMap.get(key);
            //根据originObj有没有实现接口来决定使用jdk proxy还是用 cglib proxy
            Object newObj = proxyFactory.getProxy(originObj);
            //更新bean池
            beanPool.getBeansMap().put(key,newObj);
            beanPool.getBeansMapWithClassName().put(originObj.getClass().getCanonicalName(),newObj);
        }


        return beanPool;
    }

    private Object getFieldValueInMap(BeanPool beanPool, String typeName) throws Exception{
        Object fieldInMap = beanPool.getBeansMapWithClassName().get(typeName);
        //如果类名无法找到，需要到类继承的接口中寻找
        if (fieldInMap == null){
            for (String key : beanPool.getBeansMapWithClassName().keySet()){
                Object obj = beanPool.getBeansMapWithClassName().get(key);
                Class[] interfaces = obj.getClass().getInterfaces();
                boolean match = false;
                for (Class interfaceClass : interfaces){
                    String interfaceName = interfaceClass.getCanonicalName();
                    if (interfaceName.equals(typeName)){
                        match = true;
                        fieldInMap = obj;
                        break;
                    }
                }
                if (match){
                    break;
                }
            }
        }
        return fieldInMap;
    }


    public Set<Class<?>> getClasses(String pack) {
        // 是否循环迭代
        boolean recursive = true;
        // 获取包的名字 并进行替换
        String packageName = pack;
        String packageDirName = packageName.replace('.', '/');
        // 定义一个枚举的集合 并进行循环来处理这个目录下的things
        Enumeration<URL> dirs;
        try {
            dirs = Thread.currentThread().getContextClassLoader().getResources(
                    packageDirName);
            // 循环迭代下去
            while (dirs.hasMoreElements()) {
                // 获取下一个元素
                URL url = dirs.nextElement();
                // 得到协议的名称
                String protocol = url.getProtocol();
                // 如果是以文件的形式保存在服务器上
                if ("file".equals(protocol)) {
                    // 获取包的物理路径
                    String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
                    // 以文件的方式扫描整个包下的文件 并添加到集合中
                    findAndAddClassesInPackageByFile(packageName, filePath,
                            recursive, classSet);
                } else if ("jar".equals(protocol)) {
                    // 如果是jar包文件
                    // 定义一个JarFile
                    System.err.println("jar类型的扫描");
                    JarFile jar;
                    try {
                        // 获取jar
                        jar = ((JarURLConnection) url.openConnection())
                                .getJarFile();
                        // 从此jar包 得到一个枚举类
                        Enumeration<JarEntry> entries = jar.entries();
                        // 同样的进行循环迭代
                        while (entries.hasMoreElements()) {
                            // 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
                            JarEntry entry = entries.nextElement();
                            String name = entry.getName();
                            // 如果是以/开头的
                            if (name.charAt(0) == '/') {
                                // 获取后面的字符串
                                name = name.substring(1);
                            }
                            // 如果前半部分和定义的包名相同
                            if (name.startsWith(packageDirName)) {
                                int idx = name.lastIndexOf('/');
                                // 如果以"/"结尾 是一个包
                                if (idx != -1) {
                                    // 获取包名 把"/"替换成"."
                                    packageName = name.substring(0, idx)
                                            .replace('/', '.');
                                }
                                // 如果可以迭代下去 并且是一个包
                                if ((idx != -1) || recursive) {
                                    // 如果是一个.class文件 而且不是目录
                                    if (name.endsWith(".class")
                                            && !entry.isDirectory()) {
                                        // 去掉后面的".class" 获取真正的类名
                                        String className = name.substring(
                                                packageName.length() + 1, name
                                                        .length() - 6);
                                        try {
                                            // 添加到classes
                                            classSet.add(Class
                                                    .forName(packageName + '.'
                                                            + className));
                                        } catch (ClassNotFoundException e) {
                                            // log
                                            // .error("添加用户自定义视图类错误 找不到此类的.class文件");
                                            e.printStackTrace();
                                        }
                                    }
                                }
                            }
                        }
                    } catch (IOException e) {
                        // log.error("在扫描用户定义视图时从jar包获取文件出错");
                        e.printStackTrace();
                    }
                }
            }
        } catch (IOException e) {
            e.printStackTrace();
        }

        return classSet;
    }

    /**
     * 以文件的形式来获取包下的所有Class
     *
     * @param packageName
     * @param packagePath
     * @param recursive
     * @param classes
     */
    public void findAndAddClassesInPackageByFile(String packageName,
                                                        String packagePath, final boolean recursive, Set<Class<?>> classes) {
        // 获取此包的目录 建立一个File
        File dir = new File(packagePath);
        // 如果不存在或者 也不是目录就直接返回
        if (!dir.exists() || !dir.isDirectory()) {
            // log.warn("用户定义包名 " + packageName + " 下没有任何文件");
            return;
        }
        // 如果存在 就获取包下的所有文件 包括目录
        File[] dirfiles = dir.listFiles(new FileFilter() {
            // 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
            public boolean accept(File file) {
                return (recursive && file.isDirectory())
                        || (file.getName().endsWith(".class"));
            }
        });
        // 循环所有文件
        for (File file : dirfiles) {
            // 如果是目录 则继续扫描
            if (file.isDirectory()) {
                findAndAddClassesInPackageByFile(packageName + "."
                                + file.getName(), file.getAbsolutePath(), recursive,
                        classes);
            } else {
                // 如果是java类文件 去掉后面的.class 只留下类名
                String className = file.getName().substring(0,
                        file.getName().length() - 6);
                try {
                    // 添加到集合中去
                    //classes.add(Class.forName(packageName + '.' + className));
                    //经过回复同学的提醒，这里用forName有一些不好，会触发static方法，没有使用classLoader的load干净
                    classes.add(Thread.currentThread().getContextClassLoader().loadClass(packageName + '.' + className));
                } catch (ClassNotFoundException e) {
                    // log.error("添加用户自定义视图类错误 找不到此类的.class文件");
                    e.printStackTrace();
                }
            }
        }
    }


}
